(universal-argument-other-key): Add to existing unread-command-events value.

diff --git a/lisp/simple.el b/lisp/simple.el
index 51af9d364fefe65d0dbd88707b013c6b16ff4f97..9d34a467d965352838c0dc8de006a545a3babd6d 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1016,7 +1016,8 @@ Repeating \\[universal-argument] without digits or minus sign
   (let* ((key (this-command-keys))
         (keylist (listify-key-sequence key)))
     (setq unread-command-events
-         (nthcdr universal-argument-num-events keylist)))
+         (append (nthcdr universal-argument-num-events keylist)
+                 unread-command-events)))
   (reset-this-command-lengths)
   (setq overriding-terminal-local-map nil))
 \f